Randomize procedure

  DECLARATION:  Randomize;

      PURPOSE:  Initializes the random number generator

         UNIT:  System

      REMARKS:  The random value is obtained from the system clock.

                NOTE:  The random number generator's seed is stored in a
                       predeclared longint variable called RandSeed.